home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / vmed.arc / VMC.JCL < prev    next >
Encoding:
Text File  |  1985-12-03  |  1.1 KB  |  74 lines

  1. //. VM/JCL - November 28, 1983 - Jim Kyle
  2. //. do vm (c,a,m2...m10) c=compile all, a=assemble, m=mod nbr
  3. //if w
  4. //assign w=we
  5. //else
  6. //assign w=nl
  7. //end
  8. //if c
  9. . compiling ERED modules into VMED/CMD
  10. //end
  11. //if c+m2
  12. c(lc) ed2 -c
  13. //end
  14. //if c+o+m2
  15. optlc3 <ed2/asm >ed2/asm
  16. //end
  17. //if c+m3
  18. c(lc) ed3 -c
  19. //end
  20. //if c+o+m3
  21. optlc3 <ed3/asm >ed3/asm
  22. //end
  23. //if c+m4
  24. c(lc) ed4 -c
  25. //end
  26. //if c+o+m4
  27. optlc3 <ed4/asm >ed4/asm
  28. //end
  29. //if c+m5
  30. c(lc) ed5 -c
  31. //end
  32. //if c+o+m5
  33. optlc3 <ed5/asm >ed5/asm
  34. //end
  35. //if c+m6
  36. c(lc) ed6 -c
  37. //end
  38. //if c+o+m6
  39. optlc3 <ed6/asm >ed6/asm
  40. //end
  41. //if c+m7
  42. c(lc) ed7 -c
  43. //end
  44. //if c+o+m7
  45. optlc3 <ed7/asm >ed7/asm
  46. //end
  47. //if c+m8
  48. c(lc) ed8 -c
  49. //end
  50. //if c+o+m8
  51. optlc3 <ed8/asm >ed8/asm
  52. //end
  53. //if c+m9
  54. c(lc) ed9 -c
  55. //end
  56. //if c+o+m9
  57. optlc3 <ed9/asm >ed9/asm
  58. //end
  59. //if c+m10
  60. c(lc) vmed10 -c +o=ed10
  61. //end
  62. //if c+o+m10
  63. optlc3 <ed10/asm >ed10/asm
  64. //end
  65. //if a
  66. . assembling modules to CMD file
  67. c(e) (jcl,abort)
  68. lered
  69. avmed:1-ne-nm-nc-#w#
  70. b
  71. //end
  72. . VMED compilation and assembly complete.
  73. //exit
  74.